home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / CRS / crs13.d81 / acqui2.sda / A17 (.txt) < prev    next >
Commodore BASIC  |  2009-10-10  |  278b  |  9 lines
  1. 50 SYS37190
  2. 100 QO$=CHR$(34):POKE53281,11:POKE53280,11:PRINT"[151]"
  3. 200 PRINT"[147]LOAD";QO$;"A10";QO$;",8,1"
  4. 300 PRINT"REM[155]LOADING ARQUICE[144] 1 MINUTE SET-UP[151]"
  5. 400 PRINT"POKE44,16:POKE4096,0:POKE56,154:NEW:CLR"
  6. 675 PRINT"LOAD";QO$;"A18";QO$;",8"
  7. 680 FORI=1TO9
  8. 700 POKE630+I,13:NEXT:POKE636,82:POKE637,85:POKE638,78:POKE198,9
  9.